home *** CD-ROM | disk | FTP | other *** search
- object frmAdd: TfrmAdd
- Left = 709
- Top = 259
- Width = 632
- Height = 431
- BorderIcons = [biSystemMenu]
- Caption = 'frmAdd'
- Color = clBtnFace
- Constraints.MinHeight = 311
- Constraints.MinWidth = 606
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- Position = poMainFormCenter
- Scaled = False
- OnClose = FormClose
- OnCreate = FormCreate
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object Dialog: TPageControl
- Left = 2
- Top = 2
- Width = 621
- Height = 364
- ActivePage = tsOptions
- Anchors = [akLeft, akTop, akRight, akBottom]
- BiDiMode = bdLeftToRight
- MultiLine = True
- ParentBiDiMode = False
- TabOrder = 2
- object tsFileSelect: TTabSheet
- Caption = 'tsFileSelect'
- object LevelUp: TSpeedButton
- Left = 232
- Top = 1
- Width = 23
- Height = 22
- Flat = True
- Glyph.Data = {
- D6020000424DD60200000000000036000000280000000F0000000E0000000100
- 180000000000A0020000120B0000120B00000000000000000000C0C0C0C0C0C0
- C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
- C0C0C0C0C0C0C000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000C0C0C0
- 00FFFFC0C0C000FFFFC0C0C000FFFFC0C0C000FFFFC0C0C000FFFFC0C0C000FF
- FFC0C0C000000000000000000000FFFFC0C0C000FFFFC0C0C000FFFFC0C0C000
- FFFFC0C0C000FFFFC0C0C000FFFFC0C0C000FFFF000000000000000000C0C0C0
- 00FFFFC0C0C000FFFF000000000000000000000000000000000000C0C0C000FF
- FFC0C0C000000000000000000000FFFFC0C0C000FFFFC0C0C0000000C0C0C000
- FFFFC0C0C000FFFFC0C0C000FFFFC0C0C000FFFF000000000000000000C0C0C0
- 00FFFFC0C0C000FFFF00000000FFFFC0C0C000FFFFC0C0C000FFFFC0C0C000FF
- FFC0C0C000000000000000000000FFFFC0C0C000000000000000000000000000
- 0000C0C0C000FFFFC0C0C000FFFFC0C0C000FFFF000000000000000000C0C0C0
- 00FFFFC0C0C0000000000000000000C0C0C000FFFFC0C0C000FFFFC0C0C000FF
- FFC0C0C000000000000000000000FFFFC0C0C000FFFFC0C0C0000000C0C0C000
- FFFFC0C0C000FFFFC0C0C000FFFFC0C0C000FFFF000000000000000000C0C0C0
- 00FFFFC0C0C000FFFFC0C0C000FFFFC0C0C000FFFFC0C0C000FFFFC0C0C000FF
- FFC0C0C000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000C0C0C0000000C0C0C0000000
- 00FFFFC0C0C000FFFFC0C0C000FFFF000000C0C0C0C0C0C0C0C0C0C0C0C0C0C0
- C0C0C0C0C0C0C0000000C0C0C0C0C0C0000000000000000000000000000000C0
- C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0000000}
- OnClick = LevelUpClick
- end
- object List: TSpeedButton
- Left = 344
- Top = 1
- Width = 23
- Height = 22
- GroupIndex = 1
- Flat = True
- Glyph.Data = {
- 06030000424D06030000000000003600000028000000100000000F0000000100
- 180000000000D0020000120B0000120B00000000000000000000C0C0C0C0C0C0
- C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
- C0C0C0C0C0C0C0C0C0C000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000FFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFF000000000000FFFFFF800000800000FFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFF800000800000FFFFFFFFFFFFFFFFFFFFFFFF000000000000FFFFFF
- 808080800000FFFFFF000000000000FFFFFFFFFFFFFFFFFF800000FFFFFF0000
- 00000000FFFFFF000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000FFFFFF
- 800000800000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF800000800000FFFFFFFFFF
- FFFFFFFFFFFFFF000000000000FFFFFF808080800000FFFFFF000000000000FF
- FFFFFFFFFF808080800000FFFFFF000000000000FFFFFF000000000000FFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFF000000000000FFFFFF800000800000FFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFF800000800000FFFFFFFFFFFFFFFFFFFFFFFF000000000000FFFFFF
- 808080800000FFFFFF000000000000FFFFFFFFFFFF808080800000FFFFFF0000
- 00000000FFFFFF000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000FF0000FF0000FF0000FF0000FF0000FF0000FF
- 0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000}
- OnClick = ListClick
- end
- object Report: TSpeedButton
- Left = 368
- Top = 1
- Width = 23
- Height = 22
- GroupIndex = 1
- Down = True
- Flat = True
- Glyph.Data = {
- 06030000424D06030000000000003600000028000000100000000F0000000100
- 180000000000D0020000120B0000120B00000000000000000000C0C0C0C0C0C0
- C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
- C0C0C0C0C0C0C0C0C0C000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000FFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFF000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000FFFFFF
- FFFFFF800000FFFFFFFFFFFF000000000000000000FFFFFF0000000000000000
- 00FFFFFFFFFFFF000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000FFFFFF
- FFFFFF800000FFFFFFFFFFFF000000000000000000FFFFFF0000000000000000
- 00FFFFFFFFFFFF000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000FFFFFF
- FFFFFF8000008000008000008000008000008000008000008000008000008000
- 00FFFFFFFFFFFF000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000FFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFF000000000000000000FFFFFF0000000000000000
- 00FFFFFFFFFFFF000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000FF0000FF0000FF0000FF0000FF0000FF0000FF
- 0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000}
- OnClick = ReportClick
- end
- object lFilesToAdd: TLabel
- Left = 461
- Top = 8
- Width = 148
- Height = 13
- Anchors = [akTop, akRight]
- AutoSize = False
- Caption = 'lFilesToAdd'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object lSelAll: TLabel
- Left = 286
- Top = 310
- Width = 43
- Height = 13
- Anchors = [akBottom]
- Caption = 'Select all'
- end
- object sbDesktop: TSpeedButton
- Left = 256
- Top = 1
- Width = 23
- Height = 22
- Enabled = False
- Flat = True
- Glyph.Data = {
- 36050000424D3605000000000000360400002800000010000000100000000100
- 08000000000000010000C30E0000C30E00000001000000010000000000009463
- 0000CE9400009463290039423900FFCE63007373730000009400006394006394
- 9400949494008CA5AD00BDBDBD000031CE000094CE0094CECE004A4AFF00CE94
- FF0000CEFF0094FFFF00CEFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00000000000000
- 00000000000000000000010101020A0A0A0A0A0A0A030303030002050214140F
- 140F0F0B0F0B030503000202141414000B140F0F0B0F0B030300021414140415
- 000B140F0F0B0F0B03000B141404151515000B140F0F0B0F0A000B1406151515
- 1515000B140F0F0B0A000B15140A1515001515000F140B0F0A000B1515140A15
- 0908000B140F140B0A00010F1515140A0E1208000B140F0F030002010F151514
- 0A0E1308000B140301000202010F151514140E12080003050100020502010F15
- 1514150E13080002010002020202010B0B0B0B0B0E1208000B000C0C0C0C0C0C
- 0C0C0C0C0C0E11070C0C0C0C0C0C0C0C0C0C0C0C0C0C100D0C0C}
- end
- object lvAddfiles: TListView
- Left = 309
- Top = 32
- Width = 300
- Height = 265
- Anchors = [akTop, akRight, akBottom]
- Columns = <
- item
- Caption = 'Filename'
- Width = 273
- end>
- LargeImages = ilAdd
- MultiSelect = True
- SmallImages = ilAdd
- TabOrder = 1
- ViewStyle = vsReport
- OnChange = lvAddfilesChange
- OnDblClick = lvAddfilesDblClick
- end
- object lsTree: TLsDirTreeCombo27
- Left = 2
- Top = 1
- Width = 223
- Height = 21
- FileList = lvSource
- Glyph.Data = {
- 62010000424D620100000000000042000000280000000C0000000C0000000100
- 1000030000002001000000000000000000000000000000000000007C0000E003
- 00001F0000003863386338633863386338633863386338633863386338633863
- 3863386338633863386338633863386338633863386338633863386338633863
- 3863386338633863386338633863386338633863386338633863386338633863
- 3863386338633863386338633863386300003863386338633863386338633863
- 3863386338630000000000003863386338633863386338633863386300000000
- 0000000000003863386338633863386338630000000000000000000000000000
- 3863386338633863386338633863386338633863386338633863386338633863
- 3863386338633863386338633863386338633863386338633863386338633863
- 3863386338633863386338633863386338633863386338633863386338633863
- 386338633863}
- ReadOnly = True
- TabOrder = 6
- TreeHeight = 240
- end
- object lvSource: TLsFilelistView27
- Left = 2
- Top = 32
- Width = 300
- Height = 266
- TimeFormatStr = 'HH:mm:ss'
- Directory = 'Drives'
- DirTreeCombo = lsTree
- FileType = [ftReadOnly, ftHidden, ftSystem, ftArchive]
- Mask = '*.*'
- PopUpMenuEnabled = False
- ParentColor = False
- ReadOnly = True
- TabOrder = 7
- TabStop = True
- Anchors = [akLeft, akTop, akRight, akBottom]
- end
- object btnAddFiles: TButton
- Left = 126
- Top = 305
- Width = 75
- Height = 25
- Anchors = [akBottom]
- Caption = 'btnAddFiles'
- TabOrder = 3
- OnClick = btnAddFilesClick
- end
- object btnRemoveFiles: TButton
- Left = 415
- Top = 305
- Width = 75
- Height = 25
- Anchors = [akBottom]
- Caption = 'btnRemoveFiles'
- TabOrder = 5
- OnClick = btnRemoveFilesClick
- end
- object btnSelsrc: TButton
- Left = 255
- Top = 305
- Width = 20
- Height = 17
- Anchors = [akBottom]
- Caption = '^'
- TabOrder = 2
- OnClick = btnSelsrcClick
- end
- object btnSeladd: TButton
- Left = 342
- Top = 305
- Width = 20
- Height = 17
- Anchors = [akBottom]
- Caption = '^'
- TabOrder = 4
- OnClick = btnSeladdClick
- end
- object btnExclude: TButton
- Left = 517
- Top = 305
- Width = 91
- Height = 25
- Anchors = [akBottom]
- Caption = 'btnExclude'
- TabOrder = 8
- OnClick = btnExcludeClick
- end
- object Mask: TEdit
- Left = 296
- Top = 1
- Width = 33
- Height = 21
- TabOrder = 0
- Text = '*.*'
- OnChange = MaskChange
- end
- end
- object tsOptions: TTabSheet
- Caption = 'tsOptions'
- ImageIndex = 1
- object lAction: TLabel
- Left = 6
- Top = 16
- Width = 123
- Height = 13
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'lAction'
- end
- object lCompLevel: TLabel
- Left = 6
- Top = 53
- Width = 123
- Height = 13
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'lCompLevel'
- end
- object bTop: TBevel
- Left = 8
- Top = 84
- Width = 601
- Height = 9
- Shape = bsTopLine
- end
- object gbSpan: TGroupBox
- Left = 300
- Top = 94
- Width = 309
- Height = 59
- Caption = 'gbSpan'
- TabOrder = 1
- object lSpan: TLabel
- Left = 8
- Top = 24
- Width = 121
- Height = 13
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'lSpan'
- end
- object cbSpan: TComboBox
- Left = 136
- Top = 20
- Width = 161
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 0
- OnChange = cbSpanChange
- end
- end
- object btnPassword: TButton
- Left = 4
- Top = 286
- Width = 125
- Height = 25
- Anchors = [akRight, akBottom]
- Caption = '&Password'
- TabOrder = 0
- OnClick = btnPasswordClick
- end
- inline frAddOptions: TfrAddOptions
- Left = 2
- Top = 94
- Width = 297
- Height = 185
- TabOrder = 2
- end
- object cbAction: TComboBox
- Left = 142
- Top = 12
- Width = 171
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 3
- Items.Strings = (
- '*'
- '*'
- '*')
- end
- object cbCompLevel: TComboBox
- Left = 142
- Top = 50
- Width = 171
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 4
- end
- end
- end
- object btnAdd: TButton
- Left = 454
- Top = 370
- Width = 80
- Height = 25
- Anchors = [akRight, akBottom]
- Caption = '&Add'
- Default = True
- Enabled = False
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- OnClick = btnAddClick
- end
- object btnCancel: TButton
- Left = 542
- Top = 370
- Width = 80
- Height = 25
- Anchors = [akRight, akBottom]
- Cancel = True
- Caption = 'Cancel'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- OnClick = btnCancelClick
- end
- object ilAdd: TImageList
- Left = 408
- Top = 352
- end
- end
-